/*

*** This do file creates the replication results for 

Globalization, Women's Economic Rights and Forced Labour (with Indra de Soysa), World Economy, 30 (10), 2007, pp. 1510-1535 

Eric Neumayer (LSE)																			

Please report any errors to e.neumayer@lse.ac.uk

*/

use "Article for World Economy (womens rights).dta", replace

* Table 1
quietly xi: ologit wecon trade fdistockgdp lnrgdpch polrightsreversed execleft   muslim2 c100 c111 i.year, robust nolog cluster(country)
su wecon trade fdistockgdp lnrgdpch polrightsreversed execleft   muslim2 c100 c111 if e(sample)
corr wecon trade fdistockgdp lnrgdpch polrightsreversed execleft   muslim2 c100 c111  if e(sample)

* Table 3
xi: ologit wecon trade fdistockgdp lnrgdpch polrightsreversed execleft   muslim2 c100 c111 i.year, robust nolog cluster(country)
xi: ologit wecon trade fdistockgdp lnrgdpch polrightsreversed execleft   muslim2 c100 c111 i.year reg_eap reg_eca reg_ssa reg_sa reg_lac reg_na reg_we, robust nolog cluster(country)
xi: ologit wecon trade fdistockgdp lnrgdpch polrightsreversed execleft   muslim2 c100 c111 i.year if inc_highoecd==0, robust nolog cluster(country)
xi: ologit wecon trade fdistockgdp lnrgdpch polrightsreversed execleft   muslim2 c100 c111 i.year reg_eap reg_eca reg_ssa reg_sa reg_lac if inc_highoecd==0, robust nolog cluster(country)

* Table 4
xi: ivreg2 wecon  polrightsreversed lnrgdpch  execleft   muslim2 c100 c111 i.year  (trade fdistockgdp = lnpop lnarea   devcountrycomlanguage bitcum), robust first
xi: xtivreg wecon  polrightsreversed lnrgdpch  execleft   muslim2 c100 c111 i.year  (trade fdistockgdp = lnpop lnarea   devcountrycomlanguage bitcum), re

xi: ivreg2 wecon  polrightsreversed lnrgdpch  execleft   muslim2 c100 c111 i.year reg_eap reg_eca reg_ssa reg_sa reg_lac reg_na reg_we (trade fdistockgdp = lnpop lnarea   devcountrycomlanguage bitcum), robust first
xi: xtivreg wecon  polrightsreversed lnrgdpch  execleft   muslim2 c100 c111 i.year  reg_eap reg_eca reg_ssa reg_sa reg_lac reg_na reg_we (trade fdistockgdp = lnpop lnarea   devcountrycomlanguage bitcum), re

xi: ivreg2 wecon  polrightsreversed lnrgdpch  execleft   muslim2 c100 c111 i.year  (trade fdistockgdp = lnpop lnarea   devcountrycomlanguage bitcum) if inc_highoecd==0, robust first
xi: xtivreg wecon  polrightsreversed lnrgdpch  execleft   muslim2 c100 c111 i.year  (trade fdistockgdp = lnpop lnarea   devcountrycomlanguage bitcum) if inc_highoecd==0, re

xi: ivreg2 wecon  polrightsreversed lnrgdpch  execleft   muslim2 c100 c111 i.year  reg_eap reg_eca reg_ssa reg_sa reg_lac reg_na reg_we (trade fdistockgdp = lnpop lnarea   devcountrycomlanguage bitcum) if inc_highoecd==0, robust first
xi: xtivreg wecon  polrightsreversed lnrgdpch  execleft   muslim2 c100 c111 i.year  reg_eap reg_eca reg_ssa reg_sa reg_lac (trade fdistockgdp = lnpop lnarea   devcountrycomlanguage bitcum) if inc_highoecd==0, re
